home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Storm 1
/
Storm I.iso
/
x35
/
phone.rpt
< prev
next >
Wrap
Text File
|
1990-09-09
|
6KB
|
139 lines
/*******************************************************/
/* This report script will create a report of all */
/* users, sorted by home phone number and name. The */
/* output will be sent to a disk file called PHONE.TXT */
/*******************************************************/
/*******************************************************/
/* Note that the report scripts look a great deal like */
/* C code! ALL report script commands are in upper */
/* case. References to user file or message file */
/* fields are detailed in the documentation. */
/*******************************************************/
/*******************************************************/
/* All report scripts must begin with START */
/*******************************************************/
START
/*******************************************************/
/* Virtual fields are used within the report. They */
/* are normally used to provide computations. For */
/* instance, the username field is taking the user's */
/* first name and last name, striping off the spaces */
/* and then joining the two names together. */
/*******************************************************/
VIRTUAL
userfile STRING 32 "D:\GAP\MAIN\USERS.DAT"
username STRING 32 sysop <> 1 ? STRIP(first) # " " # STRIP(last) :
"SYSOP"
/*******************************************************/
/* The SEARCH section is where you tell the report */
/* generator how to search the file. In this case, we */
/* are searching by the userindex. The same way you */
/* see the users in GAPUSER. */
/*******************************************************/
SEARCH
FILE userfile USING_KEY user_index
/*******************************************************/
/* The SELECTION section is where you tell the report */
/* generator how to select individual records. For */
/* instance, you could tell it to to select ONLY those */
/* users with a level of 90 or greater. */
/*******************************************************/
SELECT
ALL
/*******************************************************/
/* The sort section allows you to format the report in */
/* any order you wish. It must be realized however */
/* that in using SORTS, the report generator will need */
/* to actually sort the data before it prints the */
/* report. This may take some time with large files. */
/*******************************************************/
SORT USING_KEY /* format report according to the */
/* following fields. */
DSC_NO_MOD sysop /* By sysop flag (IMPORTANT!) */
NO_MOD home_phone /* By home phone */
NO_MOD last /* By last name (ascending order) */
NO_MOD first /* By first name (ascending order) */
/*******************************************************/
/* The DISPLAY section is where you tell the report */
/* generator where to send the report. Output can be */
/* directed to any valid DOS device. */
/*******************************************************/
DISPLAY
DEVICE OUTFILE
PAGE_LENGTH 0 /* no page formatting */
/*******************************************************/
/* The IMAGE section is where the report is actually */
/* produced. You set up exactly how you want the */
/* report to appear, and the report generator will */
/* substitute your user or message fields in place of */
/* of the format specifications. */
/* */
/* Anything after a '+' is printed except that the */
/* format specifications are substitued with the */
/* actual fields that appear in the line beneath. */
/* */
/* Inside the body, you may refer to either an actual */
/* DODA name, or a name that was defined in the */
/* VIRTUAL section above. For instance, "username" */
/* does not exists as one of the DODA names but it was */
/* defined in the VIRTUAL section as a formula to use */
/* "first" and "last" (both defined in DODA) */
/*******************************************************/
/*******************************************************/
/* NOTE!!! DO NOT place any comments after a line */
/* that begins with a '+'! If you do, then your */
/* comments will be printed and/or shown! */
/*******************************************************/
IMAGE
BODY
+ HP : @xxxxxxxxxxxxxx Name : @xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
home_phone username
/*******************************************************/
/* EXIT must be the last line in each script */
/*******************************************************/
EXIT